function h=RPS_draw_game_trace(G)
h=[];
figure(G.figure2);clf;
for k=1:G.N,
    subplot(2,1,k);
    d=G.P{k}.VarsData(:,2);
    d=[d;zeros(G.max_step-length(d),1)];
    j=1:G.max_step;
    tmp=bar(j,d(j),0.5);
end;
